home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / Unknown / Unknown.m < prev    next >
Encoding:
Text File  |  1991-04-02  |  4.5 KB  |  187 lines
  1. /* File: Unknown.m - The 'Unknown' Application
  2.  *
  3.  * By: Christopher Lane
  4.  * Symbolic Systems Resources Group
  5.  * Knowledge Systems Laboratory
  6.  * Stanford University
  7.  *    
  8.  * Contributor(s):
  9.  *    
  10.  *     Jiro Nakamura (jiro@heights.cit.cornell.edu)
  11.  *
  12.  * Date: 2 April 1991
  13.  *
  14.  * Copyright: 1989, 1990 & 1991 by The Leland Stanford Junior University.
  15.  * This program may be distributed without restriction for non-commercial use.
  16.  */
  17.  
  18. #import "Unknown.h"
  19.  
  20. #import <c.h>
  21. #import <libc.h>
  22. #import <stdlib.h>
  23. #import <ldsyms.h>
  24. #import <strings.h>
  25.  
  26. #import <sys/file.h>
  27. #import <sys/loader.h>
  28.  
  29. #import <objc/typedstream.h>
  30. #import <objc/HashTable.h>
  31.  
  32. #import <appkit/Panel.h>
  33. #import <appkit/Speaker.h>
  34. #import <appkit/Listener.h>
  35. #import <appkit/defaults.h>
  36.  
  37. // #import <text/pathutil.h>
  38.  
  39. #define APPLICATION "Unknown"
  40.  
  41. #define VERIFYDEFAULTSTRING "Verify"
  42. #define DEFAULTVERIFYSTRING "Yes"
  43. #define REPORTERRORDEFAULTSTRING "ReportError"
  44. #define DEFAULTREPORTERRORSTRING "Yes"
  45.  
  46. #define getDefaultValue(s) NXGetDefaultValue(APPLICATION, s)
  47. #define registerDefaults(s) NXRegisterDefaults(APPLICATION, s)
  48.  
  49. #define getDefaultBoolValue(s) (BOOL) (strncmp(getDefaultValue(s), "Yes", 1) == EQ)
  50.  
  51. static NXDefaultsVector UnknownDefaults = {
  52.     { VERIFYDEFAULTSTRING, DEFAULTVERIFYSTRING },
  53.     { REPORTERRORDEFAULTSTRING, DEFAULTREPORTERRORSTRING },
  54.     { NULL }
  55.     };
  56.  
  57. #define HASHSEGMENT "__HASHTABLE"
  58. #define HASHSECTION "__DATA"
  59.  
  60. #define ICONSEGMENT "__ICON"
  61. #define ICONSECTION "__header"
  62.  
  63. #define BUFFERSIZE 1024
  64. #define BITSPERBYTE 8
  65.  
  66. #define EXECUTESTRING "Execute?"
  67. #define ERRORSTRING "Error running '%s', exit code = %d."
  68.  
  69. #define DEFAULTBUTTON "OK"
  70. #define ALTERNATEBUTTON "Cancel"
  71.  
  72. typedef enum { LT = -1, EQ, GT } COMPARISON;
  73.  
  74. char *basename(char *path)
  75. { 
  76.     char *s;
  77.     
  78.     if((s = rindex(path, '/')) != NULL) return ++s;
  79.     
  80.     return path;
  81. }
  82.  
  83. char *parentname(char *path)
  84. { 
  85.     char *p, *s = NXCopyStringBuffer(path);
  86.     
  87.     if((p = rindex(s, '/')) == NULL) { p = s; *p++ = '.'; }
  88.         
  89.     *p = '\0';
  90.     
  91.     return s;
  92. }
  93.  
  94. @implementation Unknown : Application
  95.  
  96. + new
  97. {
  98.     self = [super new];
  99.     
  100.     (void) registerDefaults(UnknownDefaults);
  101.     
  102.     return self;
  103. }
  104.  
  105. - (BOOL) appAcceptsAnotherFile:sender { return(YES); };
  106.  
  107. - (int) appOpenFile:(const char *) filename type:(const char *) aType
  108. {
  109.     int status;
  110.     char buffer[BUFFERSIZE];
  111.     const char *program, *base = basename((char *) filename);
  112.     HashTable *table = [self loadSegment:HASHSEGMENT section:HASHSECTION];
  113.  
  114.     if(access(filename, R_OK) == CERROR) return (int) [self unix_error:"access"];
  115.     if(chdir(parentname((char *) filename)) == CERROR) return (int) [self unix_error:"chdir"];
  116.         
  117.     if((program = [table valueForKey:aType]) != NULL) {
  118.         (void) sprintf(buffer, program, base, base, base, base, base);
  119.         if(! getDefaultBoolValue(VERIFYDEFAULTSTRING) ||
  120.           (NXRunAlertPanel(EXECUTESTRING, buffer, DEFAULTBUTTON, ALTERNATEBUTTON, NULL) == NX_OKTAG)) {
  121.               if((status = system(buffer)) == CERROR) return (int) [self unix_error:"system"];
  122.             status >>= BITSPERBYTE;
  123.             if(status != EXIT_SUCCESS && getDefaultBoolValue(REPORTERRORDEFAULTSTRING))
  124.                 NXRunAlertPanel(NULL, ERRORSTRING, NULL, NULL, NULL, buffer, status);
  125.             }
  126.         }
  127.     else return [self ReOpenFile:filename type:aType];
  128.  
  129.     return(YES);
  130. }
  131.  
  132. - appDidInit:sender { return [self terminate:sender]; }
  133.  
  134. - loadSegment:(const char *) segment section:(const char *) section
  135. {
  136.     int size;
  137.     id object;
  138.     void *pointer;
  139.     NXStream *stream;
  140.     NXTypedStream *typedstream;
  141.     
  142.     pointer = getsectdata(segment, section, &size);
  143.     stream = NXOpenMemory((const char *) pointer, size, NX_READONLY);
  144.     typedstream = NXOpenTypedStream(stream, NX_READONLY);
  145.     object = NXReadObject(typedstream);
  146.     NXCloseTypedStream(typedstream);
  147.  
  148.     return object;
  149. }
  150.  
  151. - (int) ReOpenFile:(const char *) filename type:(const char *) aType
  152. {
  153.     int size, result;
  154.     void *pointer;
  155.     port_t port;
  156.     id speaker = [NXApp appSpeaker];
  157.     NXStream *stream;
  158.     char application[BUFFERSIZE], extension[BUFFERSIZE];
  159.     
  160.     pointer = getsectdata(ICONSEGMENT, ICONSECTION, &size);
  161.     stream = NXOpenMemory((const char *) pointer, size, NX_READONLY);
  162.     
  163.     while(NXScanf(stream, "%*s %*s %s %s", application, extension) != EOF && strcmp(extension, aType) != 0);
  164.     
  165.     NXCloseMemory(stream, NX_FREEBUFFER);
  166.  
  167.     if(strcmp(application, [self appName]) == 0) return(YES);
  168.     
  169.     if((port = NXPortFromName(application, NULL)) == PORT_NULL)
  170.         return (int) [self unix_error:"NXPortFromName"];
  171.  
  172.     [speaker setSendPort:port];
  173.     
  174.     if([speaker openFile:filename ok:&result] != SEND_SUCCESS)
  175.         return (int) [self unix_error:"openFile:ok:"];
  176.  
  177.     return(YES);
  178. }
  179.  
  180. - (BOOL) unix_error:(const char *) string
  181. {
  182.     perror(string);
  183.     return(NO);
  184. }
  185.  
  186. @end
  187.